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L'original à nous faire parvenir doit être tapé à la machine avec un ruban bien 
noir, recto seul, simple interligne, avec une largeur maximale de 15 cm. Un en- 
voi sur disquette IBM simple face, sur cassette HP82161A est recommandé. Les 
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un "Kit Auteur" qui leur donnera les modèles et toutes les instructions 
nécessaires. 

Les articles qui nous sont fournis sont certifiés originaux par leurs 
auteurs. Ni la revue, ni le club ni les auteurs ne sont responsables de l'usage 
qui sera fait des programmes qui sont uniquement fournis à titre documentaire, 
les utilisateurs sont seuls responsables de l'adaptation des programmes à leur 
propre usage. Ceci est spécialement vrai des programmes professionnels. Le fait, 
pour les auteurs, de nous envoyer un article ou un programme vaut autorisation 
de publication dans MICRO-REVUE ou dans toute autre publication du club, sans 
qu'aucune rémunération soit due à l'auteur de ce fait. 





(c) 1985 REPRODUCTION INTERDITE 

Les droits de reproduction des programmes et articles de PPC-T restent 
la propriété des auteurs et de la revue. En dérogation aux mentions ci-dessus, 
la reproduction des programmes est autorisée pour l'usage personnel des 
lecteurs, à l'exclusion de toute reproduction commerciale. 

Les auteurs délèquent à la revue le droit d'autoriser la reproduction 
des articles et programmes dans d'autres revues à caractère non commercial. 
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Pierre. T440 . Borsbeekbrug JET . 2600 - BERCHEM . BELGIQUE . 


Ce programme est destiné aux navigants disposant d'un radar. 11 permet de déter- 
miner toutes les données concernant ün maximum de 5 échos observés sur l'écran d'un 
radar. Les données fournies sont Route et Vitesse (vraie et relative), CDA et 
TCDA (voir "abréviations"). Ce programme permet également tout changement de 
route et/ou de vitesse. Un mode "simulation" existe aussi. 

Ce programme est d'une bonne rapidité. I1 lui suffit de 8 secondes pour calculer 
les données concernant un écho, et 20 secondes pour recalculer toutes les données 
après un changement de route et/ou de vitesse de notre part. ; 

Ce programme tire son origine d'un programme écrit par M.A.KALCIC, c.1.c, pour 
l'ex et regrettée U.P.L.E (Users'Program Library Europe) sous le n.10721. 

Le programme à quelque peu été amélioré notamment en ce qui concerne la visualisa- 
tion de toutes les données obtenues. Quelques possibilités supplémentaires ont 
également été ajoutées. 


2092990000000900000000000000 
Abréviations 


Time (Temps à bord). 
- notre propre Route. 
- notre propre Vitesse. 
SAFE DIST. = Safe Distance Distance minimum à laquelle on désire passer d'un 
autre navire). 
BRNG = BEARING (Relèvement d'un autre navire compté de © à 368). 
d = distance à laquelle ce même navire est relevé 
T.SP = True Speed (Vitesse vraie du navire observé). 
T.C = True Course (Vitesse vraie du navire observé). 
COLLISION) = message affiché lorque le CDA est nul ou inférieur au Safe Dist. 
CDA = Closest Distance of Approach (Distance minimum à laquelle passera le navire 
observé). 
TCDA = Time Closest Distance of Approach (Moment où aura lieu cette rencontre). 
= Relative Speed (Vitesse relative de l'écho observé). 
= Relative Course (Route relative de l'écho observé). 
Changement de Route de notre part. 
Changement de Vitesse de notre part. 


Lorsqu'aucune valeur n'a ëté introduite pour Safe Dist. {R/S] la valeur par défaut 
alors de @. 
distances sont exprimées en miles marins et dixièmes. 
relèvements sont exprimés en degrés et dixièmes 
s temps sont exprimés en HH.MMSS 
Four les TCPA, les secondes sont supprimée ar d'aucun emploi pratique. 


Toutes les données obtenues peuvent &tre inscrites sur un formulaire 
RADAR PLOTTING LOG (voir exemple). 


CAS 


Magnetic card 


Cane magnétique 
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1.Charger le programme. )E US: a MER CASE, 2 À EADY X*X" affiché, 
. Introduire votre propre Route et Vite 


MODE FLOTTING : FLAG £ set. NITIALISE IN : XEG 

Pour chaque écho observé [A-B-C-D- ji touches A-B-C-D-E. 

Lorsque le Flag 2 est allumé, cela signifie que vous devez entrer la PREMIERE 
observation d'un écho. Lorsque le Flag 2 5 it, cela signifie que vous 
entrer la deuxième, troisième,quatrième, etc... observation d'un même écho. 
Chaque fois que vous voulez initialiser un écho, c-à-d. Supprimer du calculateur 
les observations précédentes déjà faites, faire XFQ © CFlag £:set) #14 

N. B : après avoir introduit votre Route et Vitesse, le calculateur se trouvera 
déjà en mode FLOTTING. Après l'introduction d'une première valeur, c-à-d. après 
avoir fait XEQ À ou B ou C ou D ou FE, le calculateur quitte le mode FLOTTING. 
(Voir exemple pour plus de compréhension). 

Lorsque vous voulez introduire une Zième, Sième, etc... observation, taper la 
lettre correspondant à l'écho observé [4-B-C-D-E] (Flag 2 clear). Après la 
dernière valeur introduite, le calculateur affiche "COMPUTING"; 8 secondes plus 
tard, il affiche les données obtenues. Fressez RS après chaque résultat, 
surtout après le DERNIER ( le calculateur doit afficher 0.00 avant d'utiliser 
une autre fonction). 


. CHANGER DE ROUTE ET/OU DE VITESSE : XEQ à (Flag 3 set). 
Pour tout changement de route et/ou de vitesse, XEQ à. Le calculateur vous 
demande alors l'heure effective à laquelle aura lieu ce changement, la nouvelle 


route (FR ?) et e vite t#Y 7?) C Flag 5 allumé). 


Après l'introduction de la dernière donnée, le calculateur affiche RECOMPUTING, 
et recalcule toutes les données des échos observés; 20 secondes plus tard il 


s'arrête et affiche @.0@ (Flag 3 éteint). 


.- MODE SIMULATION : XEQ e (Flag 1 + Flag 3 set). 

Cette fonction permet de voir ce que donnerait un changement de Route et/ou de 
Vitesse sur le CDA et TCDA des autres échos. 

Le calculateur vous demande l'heure effective de changement désiré, la route et 
la vitesse prévue. Le calculateur affiche alors 0.00 

Four voir l'effet de ce changement prévu sur chaque écho, pressez la lettre de 
l'écho désiré [A4-B-C-D-E] : la HP affiche alors : « 


lettre : CDA a TCDA 


Lettre [A-B-C-D-E], CDA et TCDA étant remplacés par les valeurs calculées. 
Pour QUITTER le mode simulation : XEQ d. Le calculateur affiche 0.00 


Remarque : pour plus de facilité d'emploi, j'ai reproduit sur un morceau de 
carton assez dur une carte magnétique avec les diverses fonctions (voir schéma en 
début d'article), ce qui me permet de glisser ce bout de carton dans l'encoche du 
CARD READER et d'avoir les fonctions en face de moi. À chacun sa méthode ! 


D D 


P.S : Lors de l'introduction de notre Route et Vitesse, le calculateur demande aussi 


SAFE DIST.?; c-à-d. la distance minimum de sécurité pour passer un autre navire. 


Lors de l'introduction d'heures avant et après minuit, par exemple lère observation à 23.55 
et 2ème observation à 00.05, introduire la 2ème observation sous la forme 24.05 et ainsi de 
suite pour 01.05,par exemple, 25.05. Ceci uniquement au cas où minuit se trouve entre deux 


chservations. Si la lère observation à lieu à 00.10 et la deuxième à 00.20, entrer les 


heures telles quelles. 
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Exemple : 


13 A T 01.00, notre navire fait route au 100 pour une vitesse de 15 noeuds; on 
observe un écho (B) dans le 069 pour 6'. À T 61.10, on observe un second écho 
CE) dans le 179 pour 7', A4 T @1.15, un troisième écho (C) est observé dans le 
160 pour 10'. A T 01.16 l'écho B se trouve dans le @69 pour 8". 

<2 Nous décidons de manoeuvrer sur tribord : nouvelle route 147, nouvelle 
vitesse 14’. Juste avant de changer la route, à T @1.21, un quatrième écho (D) 
est relevé dans le 090 pour 12'. À T 01.26.38, l'écho C apparait droit devant 
dans le 147 pour 5'2. 


<3 À T 01.28 on remet la vitesse à 15 noeuds. A T 01.30, l'écho E est dans le 
479 pour 5'5. 


<43 À T 01.40 l'écho B est relevé dans le 015 pour 245. 
<5> A T 01.41 pouvous-nous changer en toute securité notre route vers 100 ? 
<6> A T 01.42, l'écho D est dans le 065.4 pour 9'99. 


{73 À T 01.44 nous changeons effectivement notre route vers 100; la vitesse 
reste à 15 noeuds. 


<8> À T 02.00, l'écho E est dans le 176 pour 2'8. 


<9> À T @2.01 on apercoit un écho (A) dans le 088 pour 15’; à T @2.07 cet écho 
À se trouve toujours dans le même relèvement : ©@88 pour 15'. 


Notre Navire 
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Callision 
Avoidance 


System 


PRP “CAS 


BLeLBL “CAS” 

4n PSIZE kEQ d 

“#+ READY #47  AVIEH 
STOP 


98eLBL A 
"A" 36 GTO 81 


126LBL B 
“8 31 GT0 61 


16eLBL € 
“C" 26 GTG 81 


28eLBL D 
“D 21 GTO@I 


24eLBL 88 

RCL 93 STO IND {1 
DSE 11 RCi 7 
STO IND 11 SE !1 
RCL 08 STO IND {1 
GT0 86 


J4eLBL E 
"E" 16 


374LBL Bi 

STO {1 FS? 01 GTO 07 
XEQ 82 FS?C 82 CTO 6€ 
“COMPUTING"  AYIEH 
RCL 43 STO 04 
RCL INDIL - 
ST+ IND 11 1/K STO 86 
DSE 11 RCL IND ii 
DSE 11 RCL IND 1! 

SG 11 STOP CHS P-R 
RCL 87 STO IND 1 
DSE {1 RCL 98 
STO IND 11 STO 48 
XEQ 45 STs 86 XC)Y 
STO 85 RCL 87 KEQ 17 
RCL 85 RCL 86 P-R 
RCL 81 RCL 82 KXEQ 85 
DSE {1 STO IND 1! RHI 
STO 18 KC)Y DSE 11 
368 XC)Y KEY? + 
STO INB 11 RHD STO 92 


92eLBL “PLT" 

FIX 2 “T.SP=" ARCL 18 
“+ KTS" AVIEN STOP 
RCL 99 364 HOD STO 89 
"T.C=" ARCL 89 AVIEH 
STOP RCL 39 RCL 88 
KÇ=Y? XER "COLL" 
“CIA=" ARCL 88 
*HN.NI" AVIEN STOP 
RCL 84 XEQ “HN” 
“TCDA=" ARCL 37 FIX 
AVIEM RTN RCL 85 360 
KOY KEY? + FIK 2 
“R.SP=" ARCL 86 
“HKTS" AVIEN STOP 
RCL X 368 MOD "R.C=" 
ARCL X AVIER RTK 
GTO 86 
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1424LBL € 
e* SF 41 SF 03 


146eLBL 02 

“HOTIME?* PROMPT HR 
STO 93 FS? 63 GTO "CC" 
“BRNG?* PROMPT STD 87 
“d?" PROMPT STO 88 
GTO 6 


168eLBL b 

"R?* PROMPT STO Bi 
"V2" PROMPT STO 82 & 
"SAFE DIST.2"  PROMPT 
ST0 39 


171eLBL c 
SF @2 4 RTN SF Bi 
GTO #6 


177eLBL a 

SF A3 “a” KE 02 

xEQ d 36 STO {1 

KEO A7 KEG 87 KEO 07 
XEQ 97 KEQ B7 REL 88 
STO 2 RL 87 STO AI 
CLR VIEN à 


195eLBL d 
CLx CF @1 CFO2 CF 47 


288eLBL 86 
8 RIN GTD 8 


2849LBL 85 
P-R KO T # 42 + 
R-P RTH 


212eLBL 67 

FS? 82 GT0 84 RCL 43 
RCL IND 11 STO 84 - 
STO 18 RCL 08 * 

ST0 86 RL 41 RL 18 
REL 82 + CHS P-R 

DSE 11 RCL IND 11 

DSE 11 RCL IND IH P-R 
KO OT + XC) 2 + 

RCL 87 RCL 88 XEQ 85 
STO 88 XxCY STO 5 
FS? 81 GTO 81 ISG !1 
STOP STO IND 11 DSE 1! 
KOY STO IND 1 3 

ST- 11 RIN 


2539LBL COLL” 
.88781 STO Z GTO 18 


259+LBL 88 
TONE 3 “(COLLISION)” 
TOHE 7 AVIER 


264eLBL 18 
CLA ISG 2 GTO 88 RTK 


2696LBL “HM” 

ENTERT INT FIX 

CF 29 STO 37 RDN FRC 
189 + ST0 38 CLA 
ARCL 37 “+H” ARCL 35 
“HT ASTO 37 CLA RTK 
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288eLBL Af 

DSE 11 RCL IND ii 

ST0 18 DSE 11 

RCL IND 11 STO A3 K€?" 
P-R RCL 87 RCL 88 CH© 
XEQ 45 STD 86 X<2Y 


383+L8L 19 

RCL 45 - SIN LASTX 
cos RCL 688 * RCL 86 
x+#47 GTO 83 STO A4 
RCL 98 RTN 


317eLBL 43 

7 REL 84 - CHS HMS 
STO #4 xOY RCL 88 * 
ABS RHD STO 88 F6? A1 
GTO “DD* RIN GTO #6 


3340LBL 84 
3 ST- 11 RCLIND II 


DSE 11 REL INDIL X<°Y 


FS? 81 GTO “DD RTK 
GTO 86 


34ñeLBL "CC" 

"#7" PROMPT STO 67 
“#v2" PROMPT STD 88 
FS? 61 GTO 86 
“RECOMPUTING"  AYIER 
GTo 66 


357eL8L DD" 

"Hs FIX 1 ARCELX 
“ha XxOY FIK2 
ARCL X AYIEH GTO 86 
END 


LBL'CAS 
LBL'PLT 
LBL'COLL 
LBL'HX 
LBL'CC 
LBL'DI 
+ END 728 BYTES 


Tones synthetiques : 
Ligne 264 : 159,73, 
Ligne 262 : 159,87, 


KER A 
R TIME? 
2.87 PUS 
BRNG? 
88.80 RUN 
d? 
15.88 RUN 
CONPUTING 


T.SP<15,88 KTS 
T.C=188.08 
CDA=15.88 H,MI 
TCDA=8HBN 
R.SP=ÿ,@@ KTS 
R.C=8.80 





2.08 x 
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HIST 


Ce programme permet de tracer des histogrammes positifs avec une imprimante 
82147. ; 
Les données sont stockées dans la memoire etendue.L'utilisateur à le choix 
entre plusieurs procédures: 
Tracer un histogramme avec des valeurs 
exprimées en pourcent. 
_Tracer un histogramme cumulé. 
Tracer un histogramme avec les valeurs 
initiales. 


Voici un exemple sur les resultats des ventes de la firme HF en 
Decembre 1984 pour les imprimantes LASERJET dans 8 grandes villes 
de la cote ouest des U.S.A. 


BOISE 12 
DENVER 32 
LOS ANGELES 
FHOENIX 19 
FRISCO 40 
FORTLAND *? 
SAN DIEGO 

SEATTLE 12 


Dans un premier temps nous allons tracer un histogramme avec des valeurs 
exprimées en pourcent, 

A la question : "NUMERIQUE ?" repondre O6  R/S 

Donner une valeur maxi pour l'axe Y entre O0 et 100.1ci nous prendrons 
100. 

Four recommencer l'opération où pour choisir une autre valeur de YMAX 
appuyer sur À en mode USER. 

Four obtenir un cumulé appuyer sur C.Four l'obtenir directement appuyer 
sur la même touche lorsque le méssage “NUMERIQUE 7" apparaît. 

Four obtenir un histogramme quantitatif afficher 1 quand ce même méssage 
apparatt. 

L'echelle sera alors determinée directement en prenant la valeur maxi 
comme valeur limite. 


Ÿ GUNITS= 1,3 à Premier exemple YHAX < 400 7, 
a, 


BEI 
CHERS 


Devxrème exemple ; Appeyes gr [A] c% eds Le ” 
LUHITS= 1,9 à Répondre S à le question ‘Nunekique?" 
Choisir Y MAX = SO 7e 


CHÉRHENNENEENEN 
DER 

ERHHHE 

iii 

CHE 

HE 
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Y €UNITS= 1,3 à 
4,0 + nombre cl machines 
vendoes 


Luss obus 
aus de Cases Mods à Abpul 
CHEN HEEEEEE < & nes , fépondre 4  @ la question 
DHHHE Honekique ? . 
ERFERYEEEU 
FHRBIIE 
GHHER 
HIER 


Y EURITS= 1,3 + 
Rue obhnir on Hiskogramme Comule 


te s y & er Sor (E] 
en mode ‘user clès goe le gueshi 19 


4 on *\ Nunerique ? * 
apparait. 


F f. 
CHRREHERYE Nwbliez pas  d'appoyer Sur [A] en macle ‘osce 
BEEEEEEEE EEE Pour Tecommencr  loperabon. 
ERA 
FRRREEENEEREEEEIEEN BIALEL 17 127 F9? 6 
CRREREESEREEENNEENER 82 RL BE 128 RTN 1696LBL 18 
HEREREEEEENEEEEEER 83 / een 178 GETX 
84 STD L 128 CTO Ot 171 CV? 
85 INT 131 RTN 172 XOY 
PRP “HIS BE K=8? 173 DE 10 
ALALBL 16 87 GTD 2 1324LBL € 174 GTO 14 
BieLBL “HIST 42 STO AI 88 F5? gt 133 REL 11 175 REL if 
82 CLKEVS CEE 89 ST+ 2 134 STO 18 176 ST0 18 
83 CURE 44 STE 2 98 F6? 8 5, 177 CLX 
ga “HOMBRE=2 45 XROM “PRRRIS" 94 REL 89 TC 178 SEEKPT 
85 PROMPT 46 FIX 2 92 31 Sen D 179 RIK 
#6 STO 11 47 RCL : 138 STO 12 188 xEQ 16 
67 ST0 1 48 16! 93LEL 67 139 SF GI 181 65 
98 “DON 4 94 ACCHP dette 182 STD \ 


58 STO A5 95 DSE Ÿ 
99 PURFL 141 GTO 16 
18 CRFLD st 7 96 GTO 47 183eLBL 11 


1 À 52 * ALL 12 184 RCL \ 
: . 83 53 510 dé 974LBL 62 e AL : 185 ACCHR 
13 RCLFLAC 54 CLST 98 PEL ! 144 7 IR6 GETX 
14 FIY 0 55 F5? 02 99 FRC 145 / 187 ED 17 
15 CF 29 56 RTH 188 x=47 146 INT 188 DSE 19 
18: £TO 84 147 4297 189 CTO 11 
16+LEL A7 S7eLBL 84 182 REL 86 148 RTK 198 .END. 
17 “VALEUR 38 GETX 183» 149 ST+ 08 
18 AREL 85 s9 184 RCL 5 158 31 
19“ 9e 68 DSE 18 185 ; | 
2 PROMPT 6} 610 88 196 FIX ISLeLBL 12 LEL'HIST 
21 SAVEX 62-870167 187 RKD 152 ACCHR LEL "AUX 
22 KO sn 1e pese 153 DE Ÿ EN. 351 BYTES 
23 156 89 64 SEEKPT 189 ST+ 12 154 GTO 12 
AIMER 65 REL 11 118 F5? 61 155 LASTX 
25 CTG 87 66 5TO {8 111 XEO 17 156 7 
28 STOFLAC 67 65 Hé F6? 8 157 7 
68 STD x 113 RCL 12 158 FRC 
27eLBL À 114 x=87 159 ? 
28 CF 2 GSaLBL 81 115 GTO 84 168 + SERGENT ERIC T3 
29 CF 6 76 RCL \ l6 127 164 INT 3 AVENUE DES AVIANS 
38 RCL 11 71 RECHR 162 STO 12 31409 TOULOUSE. 
31 STO 18 ta GETA 17eLBL 85 163 RTH esse 
D, 73 RCL 07 118 ACCOL 
33 SEEKPT 4 113 DE Ÿ L646LBL “HUM 
34 “NUMERIQUE © 75 LASTS 128 CTO 85 165 SF 82 
35 PROMPT LE 121 FIX 2 166 ! 
36 »28? TT uRR 167 ST- {A 
37 GTÜ “HUX 18e 122eLBL 84 168 GETY 
38 “YHAYY=2 79 LAST4 123 PRBUF 
39 SF 27 8 + 124 156 \ 


48 PROMPT 125 ABS 
126 LASTK 
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VIEWAS 


VISUALISATION DE FICHIERS ASCII _ : 
(CHP-41 + X-F ) 


Le programme "VIEWAS" permet de visualiser ou d'imprimer un fichier 
ASCII préalablement stocké en mémoire d'extension. L'utilisateur peut 
demander l'impression ou la visualisation 

# du fichier complet, enregistrement par enregistrement 
# d'un bloc particulier d'enregistrements 
# de certains enregistrements non consécutifs. 


À ces possibilités, s'ajoute la particularité de supprimer ou non les 
numéros d'enregistrements. L'impression et ia visualisation se font par 
lignes de 2S (ou 24) caractères, le texte étant cadré à droite, avec 
(ou sans) tabulation, suivant le mode prédéfini par le drapeau F2G. 


Le contrôle des différentes options du programme est réalisé par les 
drapeaux F29 et F21 
FLAG @9 : Arme, provoque la visualisation / impression des numéros 
d'enregistrements avec le texte. 
Désarmé, seul le texte est affiché. 


FLAG_21 : Armé, l'impression sera effectuée si l'imprimante est en 
état de le faire (présente et sous-tension). 
Désarmé, force l'affichage et interdit toute impression. 


La sélection impression / visualisation s'effectue en tenant compte 
de la configuration matérielle (imprimante présente et sur ON ) et de 
l'état de F21 


IMPRIMANTE FLAG 21 
ON et connectée/présente sur l'IL © (CLEAR) Visualisation 
ON et connectée/présente sur l'IL 1 (SET) Impression 
OFF ou déconnectée/absente de l'IL SG (CLEAR) Visualisation 
OFF ou déconnectée/absente de l'IL 1 (SET) Visualisation 


Déconnectée, signifie ici que le module contenant les instructions 
d'impression ne figure pas au CATALOG 2 (pas d'imprimante 82143 par 
exemple).Dans le cas de la boucle HP-IL, ceci est équivalent à placer 
l'interrupteur du module sur DISABLE (ou alors retirer le module de la 
HP-41). Mais si aucun appareil de la catégorie PRINTER n'est présent 
sur la boucle, aucune erreur ne sera affichée, et le programme déclen- 
chera une visualisation indépendamment de l'état de F21. 


Avant exécution,ALPHA doit contenir le nom du fichier ASCII, et le 
registre X, un code de contrôle (Format ISG/DSE) spécifiant les enre- 
gistrements à traiter. 

Ce nombre est de la forme : ddd, fffpp 

ddd : numéro du premier enregistrement 

£££ : numéro du dernier enregistrement 

PP : pas ,cela permet d'imprimer/visualiser le fichier à 
partir de l'enregistrement ddd et en sautant pp enregis- 
trements à chaque traitement. 


Lorsque fff est supérieur au nombre maximum d'enregistrements que 
comporte le fichier, l'exécution du programme prend fin. Aucune erreur 
n'est générée. 


En fin d'exécution, la pile est effacée (registres X,Y,Z,T à zéro), 
L contient le code contrôle ,dont la partie entière est le dernier 





PPC-T No12 Janvier-Février 1987 Page 14 


enregistrement affiché. Le nom du fichier est replacé dans le registre 


ALPHA. 


Le programme crée toujours une ligne d'entéte contenant des informa- 


tions relatives au fichier traité 


registres. 


nom, 


type (ASCII) et taille en 


Cette ligne est affichée ou imprimée à chaque appel de la routine, 
suivant l'option choisie (F21). 


Exemple 1: 


AS-TEST 411 

98 PnuR Nf5 ENRECTSTREM 
CKTS 

gai CNUPTS. UNE SEULE L° 
CHE | 

A2 EST NECESSAIPE, 

983 LES ENREGISTREMENT: 
LANGS SONT IMPRIMES 
SUR PLUSIEURS LIGNE: 
AVEC NU SANS HIMERD 
© D'ENRECISTREMENTS, 

084 env FREDERIE 

985 PPC-T 697 

886 25 RUE FONTCINE DE ! 
A VILLE, 86304 NICE 

887 MAINGUY YVES 

888 PPC-T 272 

@a9 LE FLORENCE 23 8D IC 
LE CORHE D'OR A6278 
VILLEFRANCHE /MER 








D 
3 ENREGISTREMENT" 


Exemple 4: 


AS-TE5T A1AR 

Age FOY FREDERIC 

AS FFC-T 697 

96 25 RUE FONTAINE DE . 
A VILLE, 06394 NICE 

AT MAINGUY YVES 

AR FPC-T 232 

A9 LE FLMRENCE 23 BD DE 
LA CORNE D'OR 96230 
VILLEFRANCHE /MER 


Exemple 3: 


fS-TEST 180 

qua PAUR DES ENTIGISTREM 
ENTS 

A&1 COURTS, UNE SEULE LI 
GNE 

Aüë EST HECESSAIRE. 

gaz ENREGISTREMENTS 
Li SONT IMFRIMES 
SUR PLUSIEUR: LIGHES 

AYEC OI SANS NUMERO 

5 D'ERREGISTPEMENTE, 





Exemple 5: 


AS-TEST A14A 
84 BOY FREDERIC 


497 HAINGUY YVES 


Impression de la totalité du fichier "AS-TEST" de 199 registres. 
Impression de 3 enregistrements sans leurs numéros (F8 Clear ). 
Impression du début du fichier avec les numéros d'enregistrement. 
Cette partie du fichier a une structure du type NOM Prénom 
N° PPC-T 
Adresse 


Le code de contrôle permet une impression sélective champ par 
champ,ici seule la partie NOM Prénom est imprimée. 


LISTINSG : 142 Octets / 2 Pistes magnétiques 
Gi+iBL "VIE 
ee 21eLBL £gn 
ALEHG 22 CLA 
17Xx 23 FC? 95a@ 
? 24 GTO 1 
LASTX 25 LASTX 
= 26 INT 
RÔLE € 27 SEEKPT 
68eLEL 28 XEQ 03 48 RTN 
Feu Fe 29 EF’ 49eLPBL 683 
DSE 29 KX<>Y 54 14 
GTO 3i1eLBL “1 SL 
“+A" 32 SF 25 Se 
RT 33 ARCLREC 
FLSIZE 34 FC? 25 
REG 427 35 GTO A5 
KEQG 4 26 KEOG 4 
PIN 37 
INT 
SEEFFTA 
RLDY + one ire 


41 GTO 
42 IISG 
43 GTO 
44eLBL 
45 CLA 
46 STO [ 
47 CLST 


61 STOFLAG 
62? RDN 

63 RTN 
64eLEL 94 
65 SF 25 
66 PRA 

67 RCLFLAG 
58 FS?C 21 
59 FC?C 25 
7A AVIEW 
K>V? 71 STOFLAS 
Ho F2 CF 25 
ETX X 73 RDN 
RDV? 74 END 
“ar 

cts 

RCLFLAG 

CF 29 

FIX © 

AFCL 





On 
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BOY_ Frédéric ___ PPC-T 697 





DETAILS DU PROGRAMME 

LIGNES COMMENTAIRES 

21 Programme "VIEWAS'"',visualisation / impression de fichier ASCII 

22-93 Vérification ALPHA non vide, déclenche ‘DATA ERROR" dans le 
cas contraire. Cela évite une destruction de la mémoire d'ext- 
ension par les révisions 1B du X-F(SEEKPT sans fichier travail) 

34-96 Calcul du nombre d'espaces à ajouter au nom du fichier pour 
former une chaine de 7 caractères. 

27 Sauvegarde du NNN du nom du fichier, dans la pile. 

28-11 Ajout de Y espaces à ALPHA. 

12 Ajout du type de fichier (ASCII). 

13 Rappel du nombre de contrôle de visualisation dans X. 

14 Détermination de la taille du fichier (en registres). 

15 Ajout de la taille du fichier,avec les zéros de téte,dans le 
registre ALPHA. 

16 Visualisation / impression de l'entéête du fichier. 

17 Rappel du nombre de contrôle dans le registre X. 

18-19 Positionnement du pointeur sur le premier enregistrement à 
traiter. 

29 Remise en place de la pile. 

21 Boucle principale. 

22 Effacement de ALPHA. 

23-24 Les numéros d'enregistrement doivent-ils être listés ? Si ce 
n'est pas nécessaire saut au LBL 91. 

25-28 Détermination du numéro de l'enregistrement, positionnement du 
pointeur, puis ajout de la valeur à ALPHA(avec zéros de tête). 

29 Ajout d'un espace. 

39 Remise en place de la pile. 

31-33 Ajout d'une partie de l'enregistrement à ALPHA, avec position- 
nement de F17 si la fin de l'enregistrement a été atteinte et 
de F25 pour la fin du fichier. 

34-35 Si le programme est arrivé au dernier enregistrement du 
fichier, alors l'exécution sst terminée (LBL 95). 

36 Sinon, affichage / impression de l'enregistrement. 

37-39 Si les numéros sont affichés, la routine prépare la marge pour 
le cadrage de la suite du texte. 

40-41 L'enregistrement a-t-1l été complètement traité ? Sinon 
traitement des caractères restant (LBL @1). 

42-43 Sioui, passage à l'enregistrement suivant. (Variable en fonc- 
tion du pas d'incrémentation du code de contrôle) 

44 À ce stade, tous les enregistrements demandés ont été listés 
ou imprimés. 

45-46 Restauration du nom du fichier en ALPHA. 

47-48 Effacement de la pile et retour. Fin du programme. 

49 Sous-programme d'ajout du nombre X en ALPHA, avec les zéros 
de tête. 

59-52 Ajout du zéros des dizaines, si nécessaire. 

53-59 Ajout du zéros des centaines, si nécessaire. 

56-61 Ajout du nombre en Y (ancien X), au contenu de ALPHA. 

62-63 Remise en piace de la pile et retour. 

64 Sous-programme de visualisation / impression du registre ALPHA 

65-66 Test de présence de l'imprimante et impression de ALPHA si le 
drapeau F21=1 

67-71 Si l'imprimante est absente, ne répond pas ou si F21=9, alors 
visualisation de ALPHA. 

72-74 Effacement de F25 (autorisation des erreurs), remise en place 
de la pile et retour. 
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ADV-PAC 


La prépemte efude , Droite. des Lonchions mofricieMes 
du nmmedufe ADvANTAGE Pace el dévnle en 

Ces Ce) é 

Pour. des naïnons de Annmüue en paar. , RT ahnbhiele 
AmibaŸ æ 6 dust eu € par-fies Ghlement 


m A7 PARTIE : 


Mopure ADVANTAGE Pace 

CArArtoGuve 2 

PRésenraTion Des Foncrionus MATRICIELLES 
STRUCTURE Des MATRICES 

STRucTURE DE L’' EnrêrTe 

MaATRIce DE TRAVAIL 

SILOOP er SIRTN 


x 27° Parrie : 
DécompPosiTion LU 
ALGORITHME 
EXEMPLES 
STRUCTURE D'UNE Matrice LU 
STRUCTURE D'UN ELÉMENT ALPHA 
CoDAGE DE LA MATRICE P 


BOY FRépérie T 697 
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Pout de nue dur ToutmArH € ADVANTAGE Face. 


Le mmodufe ADVANTAGE PAC coulite pour 
0! ur£aotreun ne bonne boite à ouh£ pour des 
Ce asile diffusé fpar- HP ponède en 
matrierelles (imotusefons écnifes pan Le ul 
oMeunrumd ces ) 
OL Le cahier de en de TOULMATH 
nmpore ea présence de telles Ponetüone : 
ë et me aa Jeprendna celles de €' anv- Pac 


uni TOULMATH , en Len anmélienantf quelque 
jet pa e: apport de Mareles Poncefrons ? 


Je mena eu effet , réjudicrakle pour 
{' ufRluatèun , de 4e lnouver devant plunceuns 
jeux de Ponctions a 5 chaee oujamt 
PUIS FRE Code coEons Aea propres 
deafec tea a + 

La com te HP ee: même Mia pas 
me Cnéern celle Tour de Bobel , M 
peuÊes puréseu tea ban a manche ( ce@les dx 
ee EoU 

But HP auroit odapher à AMméeimdne 

Res opérations ES LA de a 1SC 

pur La 91 (remmume four SOLVE ec INTEG de. 
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2! Anv _ Pac), MMoiD Ale Mme Ca fran Doit : ane 
déciaton - 

PPC-T ve dk, 

uklrofeurx, de 


e BASIC el 

eme . R pdons 

déboires de LÉ! ukbsateur. 

déal ramasser er proananmmme. d'ume 

machine  - Hume autre maclime Basic, 
mmalleneusemet Anvoev. be. 

Amafances du Fort 


de UHP-#44 : 
de cette Muni es (conPote ane €. Qe HP - IL y Main 
Pace à pRusceuns eux de Ponckioms mofnie: ; 
Elie des Reurés enfafTons Mémoire difpérereo 
des oÙaonthumes de couts AmconmpabhPes e£ des 
MmomaA GARE ER ä e derncemdna L'uki£safe 
el au dela , an nébne des else à 
(acum métal mafunefleme.t Aa pension. 
Ce probe »e Anenconlne À avec Lu 
rain Émrorriquee iquen di Mcone de La 4. Son 
R'ontaime (HP . pee ZENROM) ceMe - ct sont 
in différeukes , el L'éhbuafeur dt à 
a. Ë A! en - ( complication AimukcPe 
BE UE MCODE , es diPpunton ni 
rneakfrecnae. 2 quelques euro 
Mani Mat Efauehine. 


) 


lus Fun TOULMATH , l'E stuekon Lena. d'autault 
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0 ef ehmooaiques, Hp L'a bien 


dépend- @ de a compaltheté avec 
da ARR | 

En coms encre | pour ma dunwce (se 
MOLMHONALE. At a) 5 TOULMATH deunra mn 


C' empeumlle des Rémetions matfniecelles de LR'apy.Pac 


De sentiments d'un del ukbuslaun. 
Kids Les Chéen de CRA Liane Mme. bonaï 
qua “lé. res. Aix Toul der GE Lana 
RE accephofion d'occmda commerciaux (avec 
HP et ccD) 
Mais <e don de constdérafions 2: à 
fallait faire AVANT a cnéafton de ToutLmATH. 


AVANT pes Ayurè . 


Goy Frévreéric T 697 
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oies Ra Cie des Poliène mecse du module édiefé. 
Çen fr enX À : odnene 8200 - SFFF) onrec Le code , 
e‘ da d'eufrés me do Le N° xRon : 


NON CODE ADF KPOM 
NOW CODE AUS “FOX MINV  A5A2 892 22, 
BINIH set : NHOVE  05A3 
BINYIER A552 9298 22,02 MNAME?  ASR4 
NCTIN RS93 9A9E 22,87 HR A5AS 


OCTYIEH A5d 8265 22,84 MRC+ 56 
HEXIN CAS9S GAS 22h MRC-  A5A7 
HEAYIEN À: y 22,16 MRII 508 
NüT MRIIA  R543 
QND MRR+  A50N 
oR MRP-  ASAE 
ROR Mc asAc 
ROTKY MeC+ 654) 8 
BIT? MSIJ  ASAE 
CO MSIJA  ASAF 8 
CHASAE RGP HSS7 ls MOR+  ASER BAR 
CHEN 0998 8367 22,16 MSWAP ASE! 
1 H9F4 dés lé MSYS 
PIV 
RER 
RP? 
RHALAE 
FHPA 
J AN? € RSUX 
H+E É498 a DE GUIM 
MATS  A99 9463 SUMAE 
MET+ 0599 $dûé 237,86 TRNPS 
MAT- 1 De So YC+C 
HAT, RSC 8455 27,68 SGLVE 
HATDIN AS9E 4477 22,22 INTEG 
HAE ASE SAS cs 3h SILOOP 
KAXAE AIF 


MDET 2.6. 
MIN FRÉDERIC 


D D x 
un en On dl 


D D 19 D Où OS Li 


D A FA 


D D 


En on 


D a) fe 


Lo © 


er tr er A CT EN A € 


\ D CI 


TE 
RS VX PA 


en En 
ON fe Éd CRT QU 


9 19 : 


1 ‘ D ‘ EN : 
D 9 1) On D 
5 us L ! ‘ 
O 09 Co 


it 
EM He ed 
Mr NO 


nu! 


ED ET I 4 dej 9 is Où 
NN Z 


Fo CO OM 


Er EE 


3 


À 
D 
4 
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PARTIE 1 


Etude des Ponchoms mmalnicteles de L'Anvanracs - Pac 


Mobuce AIANTAGE PAC : 


Le module ADVANTAGE - PAG y Fe pe jun Re man 
depuis Q Lébet de L'ammée ommez , offre ) 
imareVinement d'euvinme 600F 


64 And écrifes en 


Anne “ 
143 ue dont. 
MCode Cœ car2). Le momel 
écrit en & . 
CETFS am, 


V CNY FE Foncfions booféeune el da Couvent (HP- IL Dev 
î Fonckoms malricieMes (cer - Rom 


FoncVeons malfeémeiques (mara- PAC + HP isc) 
Fonclms Penamerères (ReaL ESTATE PAC) 


De ok de ce aimes, L' Anv Pac me peut - être 
présents dau Ce Gp, 


En pet, pour. ea MERS anrec. Len Lonckions 


du wP_iL Dev , L'ADv Pac 

Den de. et las BUREAU 71 es 2 

roues aout AND tnreumble ou .… séparément . 

Corn , Am ammme éntl avec de Pondhims de 

' Apv. PAC , Codéer avec des murméne XROM , drena 
Ponerume infenpnélées , x  ÊL'Arv Pac et Le 

b & HP - IL DEV préseuL , comme des Penchioms de 


L "in vev. 


a reçu Le même 
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Los peur Ces programmes 


Cmmecte 


& dut 


CATALOGUE 2 : 


-ÉIY COR 
EIHIN 
FINYNIER 
ACTIF 
GUTYIEN 
HEËTH 
IE XVIEN 
HET 

AH 

Gr 

Ge 
POTEY 


BIT? 








Q 
n 


METDIM 
MÉE 
HÉKAS 
BDET 
MIN 
HTHU 
MHAYE 
MHAKLT 
He 
MRÈC+ 
BRC- 
MR I. 
HRIJE 
HER+ 
HRR- 
NS 
HSC+ 
F5 
HSE 





PPC-T No1l2 


Res 


YC+E 
THEDIT 
CREDIT 
"HP 
THATRA 


TYT 
NTE 


-AEY MATH 
SGOLYE 
INTEC 
SILOOP 
TSIETA 
T2tR 
TMAGZ 
'et2 
LR? 
T2tIH 
TSIR? 
"CHsz 
TTANE 
Tatz 
"LOGZ 


TT hi 
Lii4H 


T2t4 
ne 
LE 
CIM 
TC 
'Cz 
REY 


TRTS 


Janvier-Février 


1987 


"DIFES 
TEFIT 


ne 
LES 
1 


"DE 
*EFIT 
*FIT 
"V3 
'62? 
TV 
"CROSS 
'YS 
*YP 
"HOT 
VE 
Ty- 
7U4 
'YxŸ 
"UY 
"V4 
"VI 
TUx 
'TR 
“o 


IP 


GNT 


TH 
'h 
Py 
PMT 
FY 
‘I 
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PRÉSENTATION Des Foncrions MATRIGIELLES : 


Les Penrelieua mafnicieMes dm£ pra Bulk: 
écrites en MCode paf Lea opéras d' es & de 
déaloque. ses, L'ablsetux ( User INTERFACE ) 


Le MATR%X swf À acces aux encens 
Le He ccm du Ps denreut ct en 
procédune “frense - boufan * (eu made USER) 20 
Résennre. e er 2 furemiènts Jam a es du chauten 
(aec ef pans SHiFT) me pote has anscqmées . 


nm Fur ds mofnices réelle, : 


- Edifion - Lens des - Rüoturum de 
rs Vitale & lement Supremmes A 
U Tonus pus ten 


+ Cast. MN males complexes $ 
lon  mmêmes opérations e c-demus apphRcquet 
pau Lea codculs de déferriaant et de Éramn pesée 
quai extaeut des mnliises séeles : 


En debus de cehle Zonfen Paca ble mo y peut 
Réaliser Guve bete de pmeamiqua face ef d'opérations 
Jun des Amalnices aféchkées en mémeine cubräle 


is a AMV, d'en usdn, 


Soul date cb0es En pankieupies ÿ 







… M am cpu Rate des pointeurs de Diane ) & de 
so enr (5) anee raphd, Me à jour | imenément 


mé dément pesscbRe s 
= Schkage el Rappel de D" Ébéuent mousse se ou 
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ss. dnlmauttls : dééadetiss dé poches . 


- Addikion , Sera , Mubfeplicafon infenme (enfre 2 
mmaofnices ) et oexYenme (anec réel \ k& duroum 
Canec 4m né \. La mmofrice purent êlne. 


complexe - 


= Cablou to de Rat 3 de Lramrer ée (mal, nées) 
fameuse de Male, € fisllibs de ranfèrnrs 
( mof . complexes ou réelles ) 


- Opénefüns d'élas e , de dé emret pur des 
he chernmes dt a eee. 


coPeufh de Nenmes défernmineatin 


à de MMOX Cm 


et de mrumimenunme., neelrenele: de pet … 


Verka done 1m jeu. reed cemplel de Peche 
pmafniccefles (en mc) qui juatefre , parce, L'achat 
d'uum MA module. 

L'édies Ace: Ale 2" Pectre pas MEDir 

( mafnices réelles) on CMEDnir ( Amofnices complexes) 
Cen Romchionr étant en code ufuoleur vel rés 
coma nes (afprehage AteHA) mois Lim feu Leutes . 


STRUCTURE Des MaATRICEs : 


Le Mmode d'emploc ex pur. ce ruiek, Ne nue 


anrane d'ex umo. HP comscdér rom doute 
L''urbsofeun. - 
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L' imafruelion de créalion de Anafiice néelles où 
complexes ex MATDIM 

X im membne. apéerframt Û AS de ds. + 
mabrice : 


X : 3 2 cce AUuA : “NOM “ 


200. nb de Rcones ne et Le Léporafeun. 


cec: nb de chenme décimal mises 


Pour Les PA camplexes 0e Pr Ermne. nb, 
ruRtephié per de ( prantee réele + pranfce imagine) 
et hs Ho ; 

ALPHA dt Canet se. Meme de celle police : 


pr S$ a mass eË À ée en pmémuine cenfrale 
AN Mem ext de La. Porme ‘ . : 
R nnn 
avec nn Mat am er du puermien ea cote de La. 
naliias, donc Le SirE una. t, 
SO Onnn  m'ekl ahécilie Rien. à R La. 
mofnice et ie “ ee du nu 0 ie 22 


5 et à mofe qe LA mens de Hhk perl 
puperflur È 


RODS déscqmeut Ra même 
ROS motrice , doclkée à 
RS part de os 
ie 6 Le passe ef É en mêémene d'exleussim 
Dm men del cn en ou plu, 7 canarVéres. 
( cmeme Les Diiers XF) 





PPC-T No12 Janvier-Février 1987 Page 26 


R 


R nnn 


Cx déscome dau cenfaines opérakiome Le regcslre X de 


La pee - C'et un mom réservé ) 


Len makriees en XM venl Atrcleéen avec um Ge 
de Rechien parhieuQien. ce Cora de EmDR ) 


La Donetim mATDIm Aéalue of» Les epérofems 
buirromes : 

- CnéoVim de ' enfék de, prete 

- mie à our. de fa mmarice nauaiP Cqui denreut 


ceMe nePectimmée eu créée 


malins & laide de mestr ox teste 
Rermonquens e cea À Penchüne me créent 

La motrice ; ou permehtent nm édikiom Le 
ot dam rmekiecaten des &Rements ) 


- 


La M trtée oimot Créée oceupera dme : 


ee (Ree x ce) + 4 neatitres en  mémaine ceufnale 
Le +4 ef peur CN CR 


* (eee x cee) + 2 reatetres en na ÈsE d' exeuncon 
Le +2 éfant pour Le mem de La mokuice e 
pour Q' tek mn 


Le mem. éutk en XM, au besoin complete per 
des es > fur occuper 7 canockines . 


face 
( comme Les Piebiens KF) 
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ile 2 pr amunmes Autaranls créek une mokrice 3%X3 

Len mmémanne cemdnâte (Tresr4) à pad de Res 

= em marrons. ‘d' exVenncen (resr2) de men “A-xm" 

et. pestcommet. Les profes de Lame. (z) 
chemme ) pun À élémet£ de La. 2* Rigme, de 
La 3 cohemme . 

La mafncce et fon: Ro: euféle . 


















gti" 


Rosa Roc 





Roy Res 


Roy  Rot 






Ca makrice et das: 





fe " A% Rea: ÀA-XM (négibres d'éft 
f3 e . A ù . 

Gi à 2 se 4 emfête du PieMians xF) 
86 MST REC ue Eco TE oe2 


&7 Eh 
Rec ce3 Re Re, 
Rec Rec REC 


°26 or veg 











RES débéué. jéi negitne em mémoire ceutrae 


REC déique Jane emnegcobrememt en X.M. 


Dams e mafnice , Qes peeurs Det pa chiommé 


jan Le 5 émet (4 © à 3) (relrqné 
Éses de La cnéofien Den dément de La dE 


, 


Les moeurs cœuramkes das negilres , qui peuvent 
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STROCTURE DE L' ENTETE : 
SR 





b'enkék ef de La Dore : TA AA UC cc PP PN NN 
(nraleuns aa Gexa \ 


TT Tape Te À (en mémoire cautnale ) Pnce see. latae 


ALPHA pour évihn du mermañuofions 













Anfempentises 5 


T=g (em Mme d'exfeuaien) dé dE Le 


hape apéccol des Pichieno mmabruierels . 
AAA : odneme lite ds. neatkne d'euVéte en mmémotre. 
(dhorge onee La. parkikion) 
O:: dre U= © inst mermale néeQe ou 
complexe. 


Uz A  nmofnice poux Benne LU 


Nemlne de ERarcas de Qà pmanice (em Lexa.) 






Youles Les Pemctiens ukeRinent Len puocmbeuns ze s) 


NNN: Nb d'éléments de Qu. melnice ( Dama L'eutéte) 
c'e Le psc : pee x Cee (de X) 








MATRICE DE TRAVAIL : 


L’ dnatsce fete MNAME ? nefeurnme ex ALPHA Ce mom de 
La scale de rail 
Celle imPermatien et pasrreaandée aun à negiatres 


dau La zone des bufgens Qu denus des olanmes . 
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ADR+A: 2° neantre 
ADR  : A° neaalne 


en strkelire et a puce Ve : 
2$ Reg : 2L, ls Hls HE, Hle Hle Hls 


A Reg: 55 DZ 52 2e << H,@ CA 
Le nb de ne cotes du bufher 


: Pankce Qaute du code Ascii du &® canacfète du 
; Pantte lame dau code Ascii du &® canocVère du 
mem de a malice 


les mubies alé. subie daventobles , et 
Aimdképremcdhantes de x motniee coaidérée. 


ex em Den: SIZE So => Rose —> ACE je (edr alanoQue \ 


Apnè exécufim de TESTA : 
emtél: Rj, 11 CE ee 03 2e 5œ © 
buffer : 2°R 22 20 20 29 20 29 2@ 


A% Reg SS ©2 52 29 20 8D C1 


Apr exéculim de TEST2: 
en XM: At R 41 2D 58 D Lo 22 20 
eR %a ao 20 ®3 @o 5© ©3 
aa, : audur ense easo@ue En XX du Predren "A- xm “ 
(anse. puiremmt Le nb de Prier crées) 


buffer : e* Reg 21 2D S8 D Ze 2© 20 
A* Rag S5 ©2 52 êo £® %e CA 
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SilooP ET SIRTN : 


Ces Ponchions de L'Arv Pac apponaiment AUS 
4! eut de Poncfüme maltémafiques . 
Le pmomued me atamale. pes Qaux exiuVence , et 
sujet : . 
SILONF PRP “SIRTH" 
CORE: G6n5 
FDF : RCE BisLBL "SIRTH" 
KPOH: T4,f5 ge SILOGP 


Que Lot dme Silooe ? 


Son exécufion me donme RIEN : 
- La péle m'et far pertunbée, Ana mem pêus 
AU CUMe modiPceotim de Q Maaeiece: appareil 
Pas preanamem cs , Les avoiagmefeons Leo elananes 
bent zmehanaés : | 
aucun buffer m' el enéé. 
L'exécuVim me Jemklle fran dépendre da: Le. 
confraunalien de Ra #41 (em parieullen avec HP- IL) 


On peu , pous foules Anésensres, L'uhiner comume Nor 


D'orës La mems dixrennes peRènes 2emf permise, 
dead Le plus a 

Souve . Lnrecrare . LOOP (SiLOOP) 

Socve . Lnresrare . ReTuRN (SIRTN) 

Tul pole à one que SOLE eL INTEG (qui 


Seud Q MCODE prouve Pounme AM réponse . 





BOY Frénéric T697 
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PARTIE 2 


Elide des fonclions malriccelles de L'ADvVANTAGE Pac 


DécompPosiTion LU: 


Fur Va opéra ons d'Anurennion de malnice (Minv\, 

de nénolufion de Aunfme (mays), de caûeu? de 

défenamemant (moe) 5 La HP4 ufêse une forme 
Cicudiène de a malice elée décompenchion 

ee à : ps r 

LU. (pour Lower . UPrer maris *) 


Dans Ce cad Q puinrants : 

Aimarenbion : A5. AT 

déferimimamt : A» dt (a) 

re on. de saplème : AX=R = X = A. 8 


A et LrampPermée en A décomposition LU, on 
enféle et mordre eh canfoins de Aes éléments 
DomE des données ALPHA. 

Plus rebrsicien Ca maofnice eriaimele 4e puPQir 

d' inverser À Pots a maltnice (minv MINV ) Mao 
Cela inflneduk des enneuns de caleuf nrscbles 


enr Fix 9 . 
ALGORITHME : 


Cet aa cime ak £' Ala crime de Doovirrce , À 
décompose iime malice, À ex 2 maluzss LU 


Fe es que : 
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Es ( Lower Mareix ) et Lume mabuice Hriomaulaine 
imPéueure dont us (ea dément jlués au 
demua de de sé emale imei pole don£ mul ; 
Les denis dde du Dur à 
Ces Égmeuts Qu dessous de Qa diagonale DomE 
Compur co entre. (4) ef (+ 4). 


U : ( Uerer Matrix) X same. malice Hniemaufaine 
Aupérieure. dont us LR Pénal actus Qui 


demous de La diagonole primeipae st, mul. 


Pour économiser des ira IREM. 5 cebe. 
décompoathion et 


Anteckée dou (La Parme Jutaramle 
(Res Xenme coralautk © où 4 ét happurümés ) : 
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Vars L'alamiume pour À molrice cannée d'edne n 
d' Rénud (aa) 


CL: Andice de Ligue 


j : Andice de colonne 


Pour = 4 n 


Pour = Visas WA 
C= 


Pour 


A YA < A 


Aè r-A>4A 


ExEMPLES : 


Exemple 2E 


cmacdérons La malnice 3x3: A — 


Sa. décomponhièn LU el , mm appliquant ! elaonihime 


CE = dessus 
#& = 4: 
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oO 


o 3 
oo |x|0o 
À, 

Y 1 4 Oo 


Daus Ce Casa De nathiee À et décomoralote 
directement Hamas mmeodifceation . 


À : 
cts 1 mobs, À 2 A 3 
3 2. À 


Cle - ct Me peut êbe décompose dinecBuent en 2 
Mabnices LU, can ce denmcières Mm' exutedl [es - 
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Mai Em ePectomt des pren mutations de Étames : 


À + À fale que : 


& & D 
j w x 


5 
A" = |2 

À 
A’ @t ons décomposalte (ex 4) 


Remonaq ons que À, n'es Ponefcon de A'heu 
La Pevme. : 


A À À e © A 3 2 4 
À Pi 2 A 8 = lo 4 ox [2 4 2 
3 2 A À © Oo A À À 

A e A’ 


Pœt La mmalnice des permulalions de (ques, e doit 
élire. nounregandée avec L ec U. 


A' dat décomnoolklte, om oeuf alu : 
A= PF. 4 = P. LU 


Ces % /malrices dont conservées dou Q'enpace 
mnémoine de La nmafnice imthale (A) : 

mL et U mt Reanoupées ouh jume neule malice. 
n © et codée jar La présence d' élément ALPHA. 


STrRUCTURE D'OUNE MaArRIcE LU : 


Lulroduisons dau Le élantaten Les meabruices 

des exemples A ek 2, et cofeulou poux efhacune 

d'elle Le délermimaut (mer) - 

Ceci pos effet de décomposer Oa matrices 
pont ofno coutfuges fran: 

- de Lire mars 


_ des Éélémeds sous Porme de cfatne ALPHA 
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EL 


CRC 


1: 2=- 1, AE4AGAERE 


ee oies 


do) Cd fe To Mi f 


Hana Les 2 exemples, Les décomresilions LU son 
identiques , Deufes Le joscrions des ÉLéments ALPHA 
sont defpéreuVes . 


S+TRUCTURE D'UN ELÉMENT ALPHA: 
RTE 


Les aies ALPHA d'ime mmofnice LU représentent 


—… e dat de ame de La maukinse at à À, cd 
Parce Le cadeul à. inmfenpnéten Ce momtane 


Comme Ame datne ALPHA 


Fr imarndène € L' expos 2ent compormes & Le 
représenfation Jmfènne de la 91. 


+ Le tait de dtaue de L'ex sut ecole & La ; 
Ce  - de dl ce  . de de 
Sa rrodeur el drivmmt (en cas: 

N: momlkne aan cage en chaîne ALPHA 
Dia digme exposant 


(Voleur 


ex 
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107 { 
Exemple À : (au D Aa à A33 Éceuts ALPHA) 


= 3 -—- 13 © oo ee e2 @ co 
A3 33 33 33 233 4 39 
dem a, 


(pus Gi seus abat ALPHA) 


= cédé CC — dent . 
= 43 33 33 323 33 34 39 


= dem cei- den. 





CoDace DE LA Marrice P: 


Los Molniss ‘des pevmuta ons qe m' el coralifuée 
que de ® et de A4 , et en Poil codée par ta 


posction des données ALPHA dau a malice LE, 
Mile vol d'au maniès arez pantreulièe . 


Exemple À : : 

la Omofnice À m'a ps pubct de penmu ts fon pour. 
êbe décomprosée : Cependant la nmalrce P excote 
ous (a Pomme de Là mobtuice cdmkhe. 


en où donc: A = P.L.U avec VP Id 


Ps décompose fion LU el ar: | 
N: wofen mur Éni que LU 


œ: chaîne ALPHA 


Je et à moe qe On aa ALPHA occupent 
Les nmêèmes positions qe Eu À de Te malitas 
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Exemple 2: 
bams ce cas a Anofnes Pat : 


et Ca décompestkion LU: 


(Qes portions des à et des 4 
pen différentes -) 


En Lait, 2 faut distinauer 2 co : 
#æ Le 4 de P qui dont du La disgomale primer 


où au demous , Poncent (0 présence de Crea 


ALPHA aux Amêmes fonifions , apr décommeostifion. 


> Das ce exemple. A 
Pat + tu, 
Pere — za 
Fes + sa 


> Dar À! ex emmple 2, 
Pze —— tu, 
Pa — £u 81 
Ae oi Au Sc de Qa 
dia anale principale don£  Nnamemés pan un 
alarme encene dé £ bots La diagonale 
Daumas eg’ exemple 5 Pa et done oil em Eu, 


Vertes quelques exemples de codage de La saaliée P 


(oun des nralnises ds déesse arencalbees 


3 


Remarques Qa froochien de & pan rapport aux A. 
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Celle codifeeokion et neconmue par ds Poncfioms 
bavortauf avec La décomprontion LU Amai fras 
pan dus Sofres, 


Auot Q: exécuVon d'ume drcabruue Lio m' accent 
puas Les mofnices LU , dommena -k - ele À'enrneun 


ALPHA DATA , Les de 


Qu nenmcoutrne d'uume date 
ALPHA de La 


BOY Frérérice T6Aa7 
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REPERT 


REPERT est un gestionnaire très simplifié de répertoire 
téléphonique en mémoire centrale. Son seul intérêt est de 
ne pas nécessiter le module X-FUNCTIONS, 


Il se compose de deux routines, AP et SR : 


- AP, pour APPEND, ajoute un élément (nom + numéro) 
Placer en ALPHA le nom, en X le numéro, puis XEQ'AP 
le résultat en X est l'adresse du plus haut registre 
occupé (maintenu en ROO). 


- SR pour SEARCH, trouve Le numéro de téléphone 
correspondant au nom donné, 
Placer en ALPHA le nom cherché, 
Le résuitat en X est le numéro de téléphone correspondant, 


Chaque enregistrement occupe deux registres, un pour le 


_ 


nom (donc 6 lettres maximum), l'autre pour le numéro de 
téléphone. 


Faire CLRG avant la première utilisation, ne plus altérer 
les registres ensuite, 


BleLBL "REPERT" 

#2eLBL "AP" 

REL 48 1 + ASTO IND À 
L O+ XY STO INI Ÿ 
#<)T SIC AA RTH 





i4+iBL °5R" 
CF 81 RC 
1 + 2E-5 + AS: 





: PIERRE BARTHELEWT 
Z4sLBL ai 12, SBUARE HOPKINSON 
RCL IND X RCLZ K=Y? 13884 MARSEILLE 





SF 1 F5? 81 GTO A3 Fées 
REL 2 ISO X GT 61 
FE? 81 GTO 82 


364LBL 43 
RCL Z OH + RCL IND X 
RTH 


4èsLBL 82 
“PAS TROUVE* AVIEN END 
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TRUCS G ASTUCES ? 


Frédéric MOSER c/o 
CAMPENON BERNARD 
P.0. Box 1364 
32014 Hawalli 
KUWAIT 


Objet: “Deprivatisation" + recopie sur cartes, de PRGMs HP 41. 


Le "truc" Gécrit par T270 dans Micro-Revue 3, refusant absolument 
de fonctionner, sur un long (+ d'un KO) PRGM "professionnel", 
peut étre privatisé avec une astuce spéciale, j'ai passé quelques 
heures à torturer le clavier de ma pauvre 41". Le résultat est 
intéressant, puisqu'il permet de recopier tout Le PRGM 
“déprivatisé”, et éventuellement modifié sur d'autres cartes. 
L'astuce consiste à traîter le PRGM par petits morceaux, en 
l'occurance carte par carte. Voici la description : 


D'abord vider la mémoire, le plus simple étant MEMORY LOST. Lire 
les deux pistes de la première carte, puis CLX pour arrêter la 
demande d'autres cartes. La machine affiche WORKING. Faire GTO.., 
affichage de PACKING. Faire CAT 1, suivi immédiatement de R/S 
pour positionner le pointeur sur le morceau de PRGM. Faire RTN, 
puis un RESET (sur La CX, ENTER et ON, à la place de CLK/ON). 
Passer en mode PRGM, SST (pas BST) jusqu'au END, l'effacer, puis 
PACK, et SST pour revenir sur la ligne @1. Enregistrer Le morceau 
traîté. (A noter que certains morceaux lu sur deux pistes en 
demandent trois à la copie , mais on retrouvera le nombre normal 
à la fin.fle ENDi). CLP le morceau pour vider la mémoire, et il 
ne reste plus qu'a traiter chaque carte de la même manière, en 
prenant soin de numéroter les pistes. Pour ‘“recoller" les 
morceaux, utiliser la fonction MRG du lecteur. 


Je n'ai pas essaiyé d'utiliser la XMEM a la place du lecteur, 
pour enregistrer, mais je suppose que cela devrait marcher, à 
condition de mettre un LBL provisoire à chaque morceau, et en 
“recollant"" avec GETSUB. 


Ne me demandez pas d'expliquer pourquoi ou comment ce truc peut 
fonctionner, je ne suis qu'un débutant. 


Amicalement, et bonne programmation. 


T726 
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COIN DES 
U-PROS 
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«CA QUOT » 


Bonjour, 

Ce programme intitulé: E2 se propose de définir les points 
particuliers de la courbe envelope des moments fléchissant le long d'une 
poutre continue à inertie constante sollicitée par son poids propre: G et 
une surcharge:@,uniformement répartie . 

Toutes les entrées sont à réaliser dans leur unité qui seront celles 
des sorties et il est conseillé d' utiliser des Newton et des mètres sans 
changer en cours d' utilisation. 

Le calcul se déroule de gauche à droite le long de la poutre tant pour 
les entrées que pour les sorties même si l'emploi montre que l'on obtient 
les moments sur appuis de droite,pour chaque travée,avant les moments en 
travée et les réactions d'appuis.Le calcul impose cette démarche. 

Il n'y a pas de limite pour le nombre de travée sinon les possibilités 
de réalisation ultérieure. 

Pour un emploi rapide et dans les cas les plus courants je n'ai pas 
tenu à multiplier les paramètres d'entrées nécéssaires pour traiter les cas 
où les charges changeraient suivant la travée considérée,où des efforts 
ponctuels solliciteraient la poutre,et où celle ci aurait différentes inerties. 

Pour l'utilisation voici la signification des indices employés! 

-N: nombre de travées 
-G3: charge permanente en N /n 
-Q: charge d'exploitation en N/m 
-CONSOLE G:y a-t-il une console à gauche ? 
si oui: répondre:0 
si non: R 
-MGs moment dut à G seule sur la console 
considérée. MG=-G11/2 
MP: moment dut à p=0+Q sur la console 
considérée. MP=P11/2 
Lis longueur,en mètres,de la travée:i 
-L'i: longueur fictive de calcul de la travée:i 
-Mti: moment dut à ce cas de charges: 
-M''i: moment dut à ce cas de charges: = 
-Mai: moment dut à ce cas de charges: === 
- de l'appuiti (Mmaxi/appui) 
-L CONS:longueur de la consola considérée. 
-Rai: réaction d'appui maxi à l'appui:i 
-Rli: réaction d'appui mini à l'appuisi 
-XMaTi: abscisse du moment maxi maxi en travée de la travéeti 
-MaTi: moment maxi maxi en travée de la travée:i 
-X'i: abscisse 1 où le momentmaxi ou mini est nul en travée:i 
-X''is abscisse 2 où le moment maxi ou mini est nul en travée:i 
-XMIir abscisse du moment mini maxi en travée de la travée:i 
-MIli: moment mini maxi entravée de la travée:i 
-CONSOLE D ? y a-t-il une console à droite? 
si ouitrépondre:0 
si-non:R/sS 

Le programme a pour principe de donner des valeurs, normalisées par 
le règlement: BAEL 85, précises à la courbe enveloppe dont on connait l'allure. 

Les résultats seront donc tous, sans exception, positifs mais des sorties 
négatives très courantes ne sont là que pour attirer l'attention sur des 
configurations de courbes critiques. 

Pour les réactions d'appuisla plus petite des deux valeurs par appui 
n'est là que pour prévenir d'une inversion de celle ci où alors le résultat 
serait négatif. 

En ce qui concerme les consoles d'extrémités, le règlement ne tient pas 
compte de ce cas et rigoureusement on se trouve dans l'impossibilité de le 
traiter, mais d'après la méthode règlementaire nous disant d'isoler chaque 
travée et après calculs des moments sur appuis d'en déduire la courbe enveloppe 
j'ai utilisér le principe qui consiste à prendre sur appuis de rives les 
véritables moments connus part pll/2 et en travée de rive les longuers fictives 
0,81. 

Pour chaque travée l'origine de départ des cotes pour les différentes 
abscisses sera l'extrémité gauche de chacune pour des raisons d'utilisations 
simples. « 
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l'on devine. 


Aux nouveaux adhérents intéressés par ce programme et ceux qui l'acompagnent 
vous êtes invités à vous faire connaitre au sein des quelques menbres spécialisés 


en béton armé et RDM en me contactant. 


Garreau Jean-René 4ave Beauger44300 Nantes 40-74-25-72 PPC T n° 664 


o1 LBL? 


02 MTERMINE" 
03 AVIEW 
04 END 


BLeLBL “E2" 
CF 27 6 KF SF el 
CLRG 1 STO 43 e 
PROMPT STD 22 
PROMPT STD 4 
PROMPT + STÛ 8e 

"CONSOLE 6 ?* ANIE 
#20? GID A SF 85 

“NG=" PROMPT STO 14 
"HP="  PROMPT 











39418L A 

“Le FIX RREL 43 
“ke PROMPT 
RL 22 RCL A3 #=Ÿ? 
GTo Q8 1 Keÿ? GTO BE 
F5? 95 GTÈ AE RCL B7 
GTO Bi 









éBelBL RE 
REL 07 ,8 * GTO 4 







AVIER 
RCL 2 





GTO 8 

RCL 82 

REL ff REL Ÿ 
510 {A 19 “H'i=" 





FIX @ ARCL X AVIEN 
RCL 81 RCL A1 #EG E 
EL 14 477 REY 
STO 13 ST0 23 “M'i=" 
fARCL £ AVIEN GTO D 


183+LBL A4 

PEL 82 RCL 42 KEGE 
610 21 FIX 4 “Ma” 
KEQ d REL @2 REL BI 
KEQ B “H'" XEG d 
SO 11 REL 41 REL 82 
KEQ B “M XEQ d 
STü 14 REL 41 REL 81 
KEQ B STO 88 


1274LBL b 

REL 82 XEQC 1 1 

XEG e RCL 19 * + 

REL 11 RCL 16 KEde - 
FS? 05 XEQ 19 FC? 88 
GT @8 FS? 26 XEQ 19 


No12 


146+LEL 6 

“Ra REGE RCL 8! 

HEQ € 1 1 Xe 

RL 23 +* + RL 14 
RCL 17 XEe - FS?7 43 
XEQ 28 FC? 08 GTO 88 
FS? 86 XEQ 28 


167+LBL A6 

RIT CF OS XEGE 

FS9C 88 GO * * RL 13 
REL 11 - REL AS 

RL 95 2 / RL A2 * 
+ ST0 83 ê / 
gTo 42 / 2 / ST IS 
REL 13 STO 18 REY 
"ehal" SF 47 XEGE 
REL 15 REL 43 + 

RCL 15 X RELA2: 
- RLOI8 - “Wal” 
XEGE XEB a REL 14 
RCL 14 - RELAS 4 
REL BU : RL AS € 
+ STÛ 
YE E 
RÇL 85 
RCL 01 
BEL 15 
ST 12 ï + 
- RL STI # 
"MIT" XEGE XER a 
FIR @ RCLAS STÛ 64 
REL 87 STD 45 RCL 88 
gro @6 RCL IR STO 17 
REL 11 STO 18 RL 13 
gro 16 RCL 14 510 13 
REL 21 STN 19 RCL 48 
GT 23 RCL A3 RCL 82 
#=v2 GTO 08 1 ST+ 07 
+ Xe? GTO A SF 6 
GTo Ai 


F2 

















285+LBL 84 
FC? 86 GTO 4 
PROMPT STÙ {1 
PROMPT STO 14 4 

Stü a7 STU 48 RCL #1 
RCL 81 XEBR REL I! 
xey? RC Y ST it 
ST0 A “M” SF 49 
XEG E RCL A1 REL Gi 
KEQ B RCL 14 AY? 
REL Ÿ STO 14 ST0 21 
de SF A9 EG E 





319eLBL 86 
1 ST+ 62 F57 86 GT0 b 


3244LBL 41 

4 ST0 87 STO 88 

STO 11 STO 14 STO 21 
STO 88 FS? 88 STO 85 
GT0 b 
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La size est de 23 et peu de synthétique apparait pour des raisons que 


3354LBL E 
REL B5 3 TR +* 
RL @6 3 Yt# RL 2 *# 
+ 85 CL 46 
RCL BB + / RTN 


353+L8L 3 

FCL 18 #87 GTO BA 
“X'=p" AYIEW RCL 09 
REL 12 7 "x"T" SF 87 
XEG d RTH 


366+L8L 8f 
RL 49 äte RCL Îé 
PEL 18 + 4 * 


RCL 12 
SF 47 EG E 


D 7 “yes 


85 
ST0 45 
STE À 






FC?C 49 
s10 &i 





FR? ce ART 


CL A3 “He FS2C A7 
2 AREL X AYIEW 





439LBL € 
ROLE RCLAS + RÉEL Ÿ 
REL 84 # + 2 / RIN 


458eLBL € 
RCL @4 XEB 17 KOY 
RCL @5 XED 17 + RTN 


4584LBL 17 
K#07 GTO 48 + RTN 


463eLBL 86 
4 RTH 


466+LBL 19 

“L CONS. ="  AYIEN 
STQ 28 RCL 82 * + 
RTH 


474+LBL 2 
RCL 28 RL 81 * +END 
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25.500 


25.335 


20.716 
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__1:90 _ 2.56/2.04, 2.90/2.31, 3.107 2.8 , 2507/2134 , < 2.55/2.04. 1.59 


CT ELL0 [2554 [27.220 [16.315 124.281 [1,781 14335 147.320 24.354! 8.440 D 
A 

25123009) 543 12610 LH 15 [es SLT Te ilo25 1230 |2%5 

Gr.356 | ETIA [25200 | [20.758] 


ÉTÉ CÉETTÉE A7 Er 
2.231 [-5720 ] [= 52727] [-5.20) Lau 74 
CHE am | Him | Hi 09. 600 116.252 
1.391 | 13.493 | ([Roypesmimi) 








1% ir 


Az Per 
te Let sien es 
[_1 [25.337 _ | 28.893 T 3.348] 








Page 47 


1987 


Janvier-Février 


PPC-T No12 








NU 


fl 


ji 


QUE, 


RAR 








24 


ÿ CAES 
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PPC-T Nol2 


LOADEUR 


MONSN EG o- ELC- TS41 
JoSwe de le CoNVEATION 
soi PARIS. Ic-Q) 4SSUuRe. 


Parxs L. G Tau'ller 86. 


"LOADEUR ” __ MICR&OE. 


Ce modeste programme ae pou 


but de. ltn de re aux PRP 
que. 
83:53 07/04 
© pompeua ? d. pre 4nammes : T£é Heuve @ILBL ‘“POK" 
CLA MLIADDR ATOX CLA 


la ee Àh e du MLNL : XTOA ASTO à “add ?" 
p*4 Î aUIEU 3 HEXPR DECODE 


dmaude  {'edwme du débur. 3 SUBS ASTO X CLA 
ARCL à ARCL X ASTO à 


Envuxte , À a fe Lo- dit adreme 
28L8L 938 

ASTO à CODE DCDRONM 8 

AROT SUB$ aUIEU 3 

HEXPR DECODE 3 SUB$ 

ASTO x CLA ARCL à 

ARCL X POKE GTO 09 -ENDd. 


avec Sem emtenn ef uns Luts d'u 
6 A4 dix : 
ex: F@26 @32 —_. 

ade amt. 7 
Ce Mois malluuux Hub sous cuviteur & feper une durée 204 
qu tWuplacua 4L'auccwe donné. (ix; 032 lait l'aucceure dur). 
Ceux , qu comme mai of pompe ds ukues de HP IL DEVEL 


PeñouF hawux d'avoir € progtaume --- 


app Pompsug HS 
nb rok” ul Lise —{'eprom SMLE 4H" dd S. B œurgcen . 
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CAXS 


Voici un petit programme utilisé pour exécuter rapidement des 


programmes XROM sans assignation individuelle. Assignez seulement 
CAXSe« 


D099 load 5 ,; cinque dans le XROM-code, c'est à dire tous les 


programmes avec ID 20 to 23 sont exécutables. Changer pour 
autres ID's. 


CAX5-— remplir le promt avec le numéro de la fonction (DEC) 
DA92 ES 5" par exemple la cinqiuème fonction avec ID 21 a le 


Li . . numéro 64 + 5 = 69, c'est à dire CAX5 069. Et voilà 
_n 183 -C* votre fonction marche. 

2496 48R HOP 

p497 810 R= 3 

2498 294 LDER A 

Da99 158 LDER 5 

Dasa 8B6 ACC KS 

2498 O6 ACC SEX 

DA9C 423 

DA9D @1E ?HCGO 478A 


EMDIRX 


Bond HERICUER Vends, & 15 aeûk 1565 
T 643 


CG: got ke Lokrg d'une vewim À'EMDIRX dflérent de alle 
parus dans À numéne de Suileh-Aûk 1455, mac agent Les 
Même Lonchonmaliles que sen Rom ergme Sur ax 4A10X (ou à 
PA pè con kg sai qu'une HAEV 4 me connect ct Renchien 
que aatahlinen ). 

SE NEO. affehage da DATA FERRER - 
St Xcnbest au ao de canacane saflichage À ALPHR DATA 
Sinon Cx >o): 
Se L es m'ot pas oué : 
- Afctaog ce FL NOT FOUND (Mère SA n'y a aucur fchin) 
- le negobse Opera] nlast pas mode (Le féfin Count 


et dorc comté y #'Ayar ar) 
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Gi & Heu at houvé : 
D devront Le Kits couvent 
 X conkunt : PR OA e7ent dm froqamme 


DA nceot un Lchien De denndis 
PS a c'est les, Nb Agcti 
IT non 

db pt Poncegre vas de X 


: La pk Te ronde pas 


Rornaque .. Jus Le Lg, ra 4 a cts apps à sb £n 


Axxx 


ER #'a qi de rouencs du module Ercbrnded Furckon 


824B 058 
824C @12 

824D 289 

824E 084 

824F 00D 

8258 085 

8251 @FB C-REG 3/X 

8252 2EE ?CH@ ALL 

8253 0B5 x Fais DATA ERROR 
8254 @A2 NCGO  282D. 

8255 200 SETDEC 

8256 23E C-C+1 hS = RROR 
825? 0B5 * \ X<o 7) DATA ERNA 
8258 @A3 CGO  282D 

8253 260 SETHEX 

825 27E C-C-1 NS 

825B 38D * 

825C 008 NCXQ  @2E3 

825D BAG AOC SEX< 

825E 130 LDI 

825F @4Q CON 64  MEx:#0 

8268 270 RAMSLCT 

8261 038 RDATA 

8262 RE BOC ALL 

8263 046 C=@ Skx 

8264 270 RAMSLCT 

8265 @EE BOC ALL 

8266 268 REG-C 9/Q 

826? 13@ LDI 

8268 840 CON HEy 40 

8269 270 RAMSLCT 

8264 038 RDATA 

826B 27C RER 9 

826€ A6 AOC 56X 

826D @BC RCR 5 

826E 2F@ WDATA 


826F 088 SF 5 Las nage y vi % Paa 5 
\ 
) 


8270 281 * Be bou mù FL NOT Fév ND 


8271 2B@ NCXQ  ACAO 

8272 046 C=-Q  Skx 

8273 27@ RAMSLCT 

8224 Q8C ?FS 5 

8275 19B JNC +33 82A8 
8276 345 * VetA 
827? @4@ NCXQ  1@D] 
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PPC-T No12 


C=REG 
REG=C 

c=" 

REG=C 

CN CHAT Tu 4 
PT= 13 

C=C-1 PT 

?C#H@ PT 

JNC +0F 828F 
C=C-1 PT 

?C#@ PT 

JNC +14 8297 
C=C=1 PT 

?CHQ PT 

JNC +19 829F 
No are de cakes ci] À 
PT= 8 

LE 3; 

LC 

ÉE 

EE 

JNC +18 82A6 

C<0 ALL 

LC 

PT= 

(Te 

ie a 

LC LR 

CC 2 + 

JNC 

C=<a ALL 

EC 1 

PT= 3 

EC 4 Lo 

EE 4 

LC 44h 

LG 1: 

JNC +08 82RÀ6 

C=@ ALL 

LC 

PT= 

LC 

[ir 

LC 

EC 

REG=C 


a FL NOT FOUR 


C=REG ë 
_. =) Ratouns k mqufe HEY 40 


LDI 

CON 

RAMSLCT 

AC ALL 

WDATA 

\ pee FL Ver Faure 


NCGO AD3A 
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HAILET 1HT FA Hill 15h 





BBA E 


Fe END 1 VEFREL IATIUH ee 
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Du Républicain au Grégorien sur HP-1ZC 





























Le calendrier républicain était assez simple. Chaque 
année commençait à minuit avec le jour où tombait l'équinoxe 
vrai d'automne pour l'Observatoire de Paris. Le mois fut 
conservé. On suivit l'exemple des anciens Egyptiens et on 
partagea l'année en douze mois égaux de trente jours 
chacun. La semaine, en revanche, fut supprimée et renplacée 
par la décade (ou groupe de dix jours). Chaque mois en 
contenait trois. L'année, avec ses trois cent soixante-cinq 
jours, forma trente-six décades et demie. Les jours de la 
dernière demi-décade furent les épagomènes. Ils 
n'appartenaient à aucun mois. 


L'année civile, qui est purement conventionnelle, ne 
reproduisait pas exactement l'année tropique qui lui servit 
de fondement. Elle était plus courte d’un quart de journée 
environ. Pour rétablir l'accord, on ajoutait tous les 
quatre ans un jour de plus aux épagomènes. Au lieu de cinq 
11 y en avait alors six (année bissextile). Cette période 
de quatre ans constitua la Franciade. Le jour allait de 
minuit à minuit. Il fut divisé en dix parties égales ou 
heures. 


Le 22 septembre 1792 fut désigné pour étre le ler jour 
de l'ère républicaine mais encore le ler jour de l’année. 
Les jours épagomènes reçurent par un décret du 7 fructidor 
An III (24 août 1795) la dénomination de sans-culottides 
(qui avait aussi pris le nom de “jours complémentaires"). 

On prétendit ainsi glorifier un nom que les aristocrates 
infligeaient comme une injure aux défenseurs de la Liberté. 
Les sans-culottides furent consacrées à des réjouissances et 
à des fêtes. 


Le calendrier républicain fut officiellement supprimé à 
partir du ler janvier 1806... 


Marche à suivre: 
{f] © (aucune décirale) 
Col (CD.MY] 


Les dates du calendrier républicain sont entrées sous 
le format (J)JMMAA (J pour jour, M pour mois, À pour an). 
Pour MM, voir la table de conversion des mois. 

1. Entrer (J)JMMAA CR/S1 ----> Nième jour du calendrier 
A USST] ----> (J)J.MM.AARA U en grégorien 
3. Pour une autre date, écraser le résultat (aller en 1). 


Exemple: 
Le 18 brumaire An VIII (coup d'état de Bonaparte)? 
Le 94 thermidor An II (chute de Robespierre)? 
Entrer 180208 [R/S] ----> 2605 

[SSTI ----»> 9.11.1799 6 samedi 
Entrer 91102 [R/S] > 674 

[SST] ----» 27.07.1794 7 dimanche 
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LEEX] 

4 

t/1 
EglEINTG] 
C9) LLSTx] 
[al [FRAC] 
[EEXI 

2 

[+] 
EgItINTG] 
[ai(LSTx] 
[all FRACI 
(EEX] 

2 

L*] 
LxCy] 

1 

£-] 

3 

@ 

[#1 
ExOy] 
[RON] 

C+] 

[RON] 
ERON] 
TRON] 

4 

[/1 

Call INTG] 
[gl[LSTx] 
4 

[+] 


=] 


+ + 


W À DR m N © 4 — 10 © m — 


Callx<=y] 
Ly°xi 
[RON] 
ER/S] 
[al DATE] 


@1- 
@2- 
Q3- 
@4- 
@5- 
Q6- 
@7- 
©8- 
@3- 
10- 
tte 
12- 
13- 
14- 
15° 
16- 
17- 
18- 
19- 
20- 
21- 
Z2= 
23 
24- 
Z25- 
26- 
27- 
28- 
29= 
30- 43 
31- 43 
d2= 
33 
34- 
35° 
36- 
37- 
38- 
44= 
4Q- 
41- 
42- 
43- 
44- 
45- 
46- 
47- 
48- 
49- 
50- 
St- 
G2= 
537 
54- 
S5- 
56- 
57- 
5se- 
59 
60- 43 


4 
10 


36 
24 
26 

2 
20 


36 
24 
26 

2 


34 
1 
30 
3 
Q@ 
20 
34 
33 
40 
33 
33 
33 
4 
1Q 


4 
20 
1 
30 
3 
6 
5 
20 
40 
49 


BR 


Gi 
DEDPBBNLJ-DSD—N 


34 
21 
33 
31 
16 


[gl[GTO]1 @1 61-4333 @1 
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TABLE DE CONVERSION DES MOIS: 


2 2 2 O8 2 6 D D 2 2 MS 8 ee mm 


Vendémiaire @1 AUTOMNE 


Brumaire 2 
Frimaire 03 


Nivôse @4 HIVER 


Pluviôse 05 
Ventôse 06 


Germinal Q7 PRINTEMPS 


Floréai 8 
Prairial 3 
Messidor 1 ETE 
Thermidor 11 
Fructidor 12 


Jours épagomènes 
sans-culottides 13 
(ou 
complémentaires) 


jour 
jour 
jour 
jour 
jour 


jour de la révolution 


(tous les quatre 


ans) 


pr Halle (PR-T 551) 


N (nième jour depuis le début du 


calendrier républicain) 


21,091792 (veille du ler jour de 
l’ère républicaine) 


4849 (durée de l'ère: 4848) 


Si entrée d'une date postérieure au 


1@ nivôse An 14: 9,999999 99 
Nième jour du calendrier. 


Date convertie dans le 
calendrier grégorien. 
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REACTIONS 


DE A 
Pougeon Olivier J.D. Dodin 
TEZ P64 President P.P.C. 


6 Ed Chanard 77 rue du Cagire 
56170 QUIRERON 31300 TOULOUSE 


Cher Jean Danie! 

C'est avec beaucoup de retard , J'en suis conscient que 
Je me manifeste suite à ta lettre du debut aout. 

En effet , ceile ci est rombee pour "moi : en piein 
milieu de la saison , bref ,; la periode la plus chargee de 
l’annee :; les Journees n'ayant que Zà4 heures 11 ne m'a pas 
ete possible de te repondre avant aujourd’hui (en fait il y 
a deux semaines maintenant que ca s’est calme , mais j'avais 
des problemes personnels a regler , et de toute facon, 
J'etais deja trop tard pour paraitre dans ie journal) er 
esperant que ce courrier te parviendra avant l’assemblee 
generale. 

En effet , inütile de te dire a quel point 1la lecture 
de ton editorial m’a desole .Helas c’est un constat objectif 
de la situation du club .A ce sujet , Je crois que les 
causes de stagnation du club sont analysees clairement dans 
ton edito encore qu'a mon avis , elles se ventilent en 
categories : raisons humaines , raisons techniques. 

-Les raisons humaines 

Elles se retrouvent en partie dans ton editorial , 

il me semble que le club ,; a l’epoque de son essor etait 
constitue pour une bonne partie par des etudiants .Moi meme 
,a l’epoque où J'ai adhere , comme a celle a laquelle J'ai 
repris le role de Franck Lebastard (lui aussi etudiant a 
1’ epoque) = J'etais dans cette situation. 
Ceux ci recherchaient des systemes de calcul portables, 
souples , fiables , avaient en plus un esprit de "recherche" 
, une curiosite certaine , sion aJoute que PB.B.C.  apportait 
une possibilite de contact avec des utilisateurs de la meme 
machine (rappelons nous qu’au depart c’est la 41, et 
presque elle seule qui nous reunissait). 

Or cette situation a evoilue, la plupart des 
etudiants d'avant ont actuellement fini leurs etudes et se 
trouvent dans deux situations : 

Ou ils sont au service , cas dans lequel ils 
n’ont ni l’esprit , ni le temps pour se consacrer au club. 

Ou ils sont entres dans la vie professionnelle 
et ils sont dans une epoque "probatoire" oui ne laisse que 
peu de temps libre. 

—Les raisons techniques 

Comme Je l’ai evoque plus haut , ce qui nous 


unissait tous , au depart , c'etait la passion de la 41 ; or 
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le elub. , et c'est logique , s'est diversifie port 


accueuillir le 71, le 75, le Forth , et toutes les machine 
de la serie 1x , ce qui fait que , parmi nos adherent.. 
chacun s’interesse a une partie de ce que le club offre 

avec seulement quelque membres (ge le crains) qui 
s’interessent a tous les centres d’interet .On avait 
d’ailleurs ressenti certains des effets negatifs de cette 
diversite a la reunion de Bretagne de Fevrier 85 , avec 


par exemple le fait que certains exposes n’etaient pas ou 
peu ecoutes (il aurait presque fallu faire le gendarme) et 
J'ai peur que ce phenomene ne se retrouve au niveau du club 
,1e Journal ne delivrant peut etre au gout de certains 


adherents qu’une trop faible partie d’informations les 
interessant individuellement. 
Une autre cause 5: liee d’ailleurs etroitement a 


la precedente est le fait que la 41 a peut etre trop peu 
evolue ,si ce n’est par le biais de la HP-IL . A une epoque 
ou la specificite de ce genre de machine (le LMS en REN, 
associe par exemple a un FORTH), la portabilite pourraient, 
combines à des capacites memoires accrues ” faire des 
merveilles ; on s’apercoit que HP abandonne pour certaines 
de 5es machines la RPN qui faisait notre bonheur et que le 
langage machine specialise laisse place a un BASIC (puissant 
certe , mais moins souple) qui fait que l’on ne peut monter 
a une machine superieure sans abandonner une grande partie 
de ce qui a ete developpe. 

Bref , on attendait une HP 4z pour prendre la 
suite. 
SEMNFIN & il me faut pas oublier que les machines 
HP, comme les ROLLS sont couteuses a l’achat . A une epoque 
ou se vendent des systemes avec un 68000  , une unite de 
diskettes , 520 Ko de memoire centrale pour moins de 5000 FF 
avec toutes les possibilites professionnelles , graphiques , 
ludiques que cela suppose , on peut comprendre que des 
machines qui sont pourtant des merveilles techniques , 
telles que la 41, le 71, le 75 se vendent moins. D’autant 
plus que l’avantage de la portabilite du materiel peut se 
retrouver par la combinaison d’un micro muni de RS252C et 
d’un terminal portable (puisqu'il en existe maintenant de 
programmables a moins de 1500 FF) qui se branche directement 
sur la R5Z32C. 
Voila donc a mon avis les differentes raisons qui font 
que le club aujourd’hui est dans une passe difficile et ce, 
malgre le travail formidable et l’enthousiasme de l’equipe 
de Toulouse .La solution serait peut etre , en plus de 
toutes celles que tu proposes dans ton edito , de chercher a 
nouveau des adherents parmis les etudiants ,; peut etre cela 
aiderait il aussi ? 
A propos , Je tiens a signaler qu’il ne me sera pas 
possible de venir a 1’AG du 1 er novembre , puisque Je serai 
coince ce week-end la , les vacances de la toussaint amenant 
du monde sur la presqu’ile (du moins nous l’esperons). 
Cette lettre aurait du, avant que Je ne recoive de si 
mauvaises nouvelles du club , etre une lettre de demission 
de ma fonction de coordinateur . En effet , comme tu peux 
t’en douter , le temps est une des choses qui me manque le 
plus actuellement , le projet que J'avais eu , l’ annee 
derniere à la meme epoque , d’une reunion en FEVRIER 86 
etait tombe a l’eau suite a des problemes de vehicule (qui 
avait ete gravement accidentee le 31 DECEMBRE) qui ont fait 
que Je n’ai pu me rendre à RENNES pour Voir la salle , et 
cette annee , Je n'ai meme pas eu le temps de prendre 
contact avec la municipalite de cette ville pour une 
eventuelle reunion pendant l’hiver a venir . Qui plus est 
mes Jours de conge sont le dimanche et le lundi matin , 
periode ou les magasins sont fermes (y compris les 
revendeurs HP) ce qui fait que Je n’ai pu remplir mon role 


2: 
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auores Ces revenceu)s genu.s À an (mon depart de la ville de 
RENNES n'ayant Das arranoe les choses).Je uensais donc 
abardonner ce poste au profit de ouelqu’'un , œur ia region 
aui serait plus cisponibie que moi : les choses etant ce 
au'eiles sor Je sense qu’'actuellement , le moment est mal 
venu de laisser ce poste vacant aussi la Solution serait 
peut etre en ce lancer ur avis dans le prochain gournal (car 
Je Suis npersuace que le club va Se relever de cette crise 
passacere) disant cue je cherche ouelqu’un pour “e 
remplacer. J'assurerai bien entendu l’interim en attendant le 
remalacant , - 

C'est avec un certain regret que Je fais cela , Mais 
il est 2e pense meilleur pour le club d’avoir un 
coordinateur ui ait plus de temps a lui consacrer : 
J'esnerais ue cet Hiver serait plus "calme" , helas , il 
s'annonce tres charge , trop pour que Je puisse organiser 
quelcue chose.Je tiens cependant a remercier tous les gens 
de l’equipe avec oui j'ai eu des contacts , ainsi que G.N. 
Nicolas qui m'avait beaucoup aide lors de l’organisation de 
la reunion de fevrier 85 

Voil ,; J'esoere oue 1’A.6G. du  i er va bien se 
derouler pour Ye EUR » amities à tous et Heureuse 
Programmation . 





Tecun Claude Lieud 
& rue de L'éraxle 
Sloo Reims 


Riu, À Atephane gc 
(us owris do Tdifon du Coge , 


Vox dé Kb Ristt d'aumdu vote mat d'amitié. Un 


ottapien dme ain Amos mois mia dau, L'ediin eÿ La 


di Qui don Qrumat que ë 
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Lou at comme de détadne 5 mn ache tour fat 
 wuoi d'ocdu Ver nu 45 … 


NAME + 


De Ou Vpomede "énue mme bras oui 
Ho Qeaucoup Frascit avec @ Hutimeur de kde eŸ L'ohaite qua. eus 


pe De, vends: 

Vos difudl ne am éfouneut que. ua Sont que 
L Apastt elle Mu LE pus DEAR PE QE MP An 
DPERENTS vos pod S'atpapueur. feu a commm ans nil wie 
con de oHutat dis Mauro dau mme You de ipénun Ve frmeliux . 
B'tbv Dofarmoliqu ax muidulle avt Lhun. Ra au 30 m'a Las nn 
Q duo de Duxytowon de Da mio Jufrmltique. 2e na Éd 
Mon 2e Syfému hamme . ai Dnperm, qu'en dilton de hokbiites, 
Qu woedre d'utilisuten heel du ASou du A en une, Gt. Ms re 
d'oQuno am, mal J'asma ,de Mo malins, owee Êo de |lan ect dés 
porno otellu. 


Eur into 5 Oxo Qu oc be d'u SA do Aracx diner 
as toi avr di taxon Jan 


Q 45 29 Honsçur arr Most. 


(Doro Pt JS vien, mme a 


monte À tuaseia ner 


aux eaalure en opt pr A Gin Am Le 
oi vw d iv aout dt UVouo \ropur d' el 
a à Cu Ron um promet eus opude 


de © 


Lo, 2tas ob) à 
Ras œù au 
bed d'uflisan en avan du Mme 
bone | ma & mad As Eutul 


JUS 


Quo Lahstiouw ef : 


Fire an Frout . 


due  ANPISTAT 


GRAN 


\ 
ds aaÎo read . 


Vans We serez dune quan part 
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PETITES ANNONCES 


Bourse 


Sont disponibles directement au club, 77 rue du Cagire, dans le cadre de la 
bourse d'échange 

* Livrets d'application pour HP-75 Math II, Math III, Statistics, Electro- 
nics à 150 F l'un, 


Le club se débarrasse de matériel dont il n'a plus l'usage. Ce matériel est 
en bon état, mais il a servi. 

HP-41 800F, 3 lecteurs de cassettes à 2000 F (batteries non garanties), im- 
primante HP-IL 82162 2000F (batteries non garanties), extension de ports 
SICAPE 800F, imprimante OKI /HP-IL 132 colonnes 3000F, interface video 
HP/IL 32 colonnes/16 lignes 82163 neuve (jamais servi) 2000F, HP-75 
(batterie neuve) avec module I/0 et module 8K 5000F, module text formatter 
pour HP-75 500F. Divers modules HP-41 (téléphoner pour le détail) 


J-D Dodin (T1) 77 rue du Cagire 31100 Toulouse (61 44 @3 06) vends (pour 
cause achat HP-28) HP-71 bon état, peu servi 3300F, module HP-IL pour HP-71 
1000, lecteur de cartes HP-71 1000F (5000F pour achat du tout), pour IBM-PC 
carte HP-IL d'origine HP avec plusieurs versions d'HP-LINK, dont celles de 
HP et de BCMW, vous permettant de faire converser votre 71 avec votre IBM- 
PC (ou 100% compatible), fils HP-IL de 19 mètres (2) neuf, 2000F, interface 
video HP (32 colonnes par 16 lignes) neuf 2000F, moniteur video profession- 
nel 20 cm de diagonale d'écran, boitier métallique, 600F. 


Bernard Bradzil 2 rue du Vivey 33290 Blanquefait vends HP-75 1983 avec 
interface video, moniteur et doc, 4590F 


T 398 Genest Pi 
Vends Interface 
1983 1900 F 











. 1.68.5£ (50 rée) 
61.41.87.49 (heures bureau) 





À. Kuzy Heunt 

2% aus Coste 

Q2490 LA COURNELDVE 

ER IG x A. US 28 1AD2 
AG x 4. UŸ 91 54 AU HR. 


-HPUAC modifiée CV (AUD cucnporr ) A300, co 
-HPIL 82/60 A Ÿoo, 50 
Lu 2820414 (KT) 4 ak 300 ,00 
D UP  B2AGSZA (iupuwate) + À ambraur 2500,60 
_ moduk SICAPE extece cle Pat 650,60 
UP P2/4o4A (hu deako)+ # dote .. AAG,50 
L HP R2 AQ0 À Lateue gran (PA ASo ,00 





- HP R2 o6C chan quon DE Piece xx @i 8 pau 750,00 
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- 4 82 ARS A4 
- RP 2 A80 4 
- #4P 89 ABA A 
_ 4® 82 AS2A 
HE, SéA-Siad 
_ HP Lo 406 A 


. FRégue. Ar. en rale d'ubtégte,. 











métaé Ga | 00 ,09 
moi X Soucis, L69 ,50 
edit K Taruony Lo ,00 
Gcteur cale banni Ye ,60 
modu@ PLoTTER Lo ,6o 


Uélul tisse DE prece où fe 2 fn AS9 00 





- our GAQEC Pac 4  (KP63 +97) ae cotes 266,80 
— Lune asc cotes Lans à MOPORRAPUE TT A6 , 50 
u AT AC) 

ANTEMUES A9 ,00 

GARES A69 ,80 

es. Au Ft de & Bree TA ‘ (Ta llasel'e, ) Ÿo, 00 
- & Go 4 & HPun Cent à 3,60 
= Pogau ei HP GA (Dacau pa -Blux) Se, to 
_ Stoke Prene = CuRec) Ju aude %o ,00 


PPC-T No1l2 


2 Bot erfrat de ave 
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LES JOURNAUX 


Journaux PPC-T 12 


Rien de CHHU, bien que j'ai renouvelée ma cotisation. Tout ceci n'est pas bon 
signe, mais adhérez quand même, le peu qui vient est inappréciable. CHHU Po Box 
10758 Santa Anna CA 92711-0758 USA. 


Le numéro V13N9 Décembre 86 de PPC Journal. Surtout consacré à la 41, avec des 
réimpressions. Contient un communiqué de Hewlett-Packard sur l'utilisation des 
batteries rechargeables et un autre article sur les piles alcalines, sans rien 
de très nouveau. Publication de routines pour utiliser une thinkjet avec la 41. 
PPC PO Box 90579 Long beach CA 90899, USA. 


Technical notes 15 et 16. Toujours intéressant. Tarif étranger (deux numéros 
tous les deux mois) $35 Australiens. PPPM inc Po Box 512 Ringwood Vic 3134. 


JPC- Novembre et Décembre-Janvier. Ils sont à nouveau à jour et abattent un re- 
marquable travail sur le HP-71. En particulier ils viennent de mettre sur le 

marché un module JPC qui reprend une idée que j'avais exprimé ici pour la 41 il 

y a longtemps et qui n'a jamais été réalisée. C'est le 71 qui en bénéficie. Ce 

module va comporter une partie "fixe" de 16K de lex parisiens mais vous pourrez 

y ajouter vos propres programmes dans la limite de 32 ou 64K, PPC-Paris se char- 
geant de brûler le ROM pour vous. Il y a longtemps que je pense qu'un ROM à la 

demande est un accessoire de grande valeur, et nous devons un grand merci à PPC- 
Paris pour le mettre à la portée de tous. Pensez que vous aurez tous vos pro- 
grammes sous la main et toute la mémoire pour les données... Entre 1900F et 

2700F, mais vus nos délais les prix de souscription seront peut être dépassés. 

Renseignez-vous. PPC-Paris 56 rue Jean-Jacques Rousseau 75001 Paris. 


HP-USER Nieuws, le petit journal publié par PRINS en hollande publie son dernier 
numéro (c'est une épidémie) avec une grande nouvelle : La HP28C, version scien- 
tifique de la HP18 sera dans les magasins quand vous recevrez ce journal ET ELLE 
EST EN RPN. En fait elle travaille à la fois en RPN AVEC AFFICHAGE DES 4 NIVEAUX 
DE LA PILE. Ses 128K de ROM (il n'y a pas de faute de frappe !) -contre 12 pour 
la HP-41- contiennent des merveilles, d'autant plus que ce n'est pas une machine 
réellement programmable (2K de RAM) et donc plus proche d'une HP-15 que d'une 
41. Visez un peu le catalogue : calcul différentiel et intégral, algèbre 
linéaire, matrices et vecteurs, conversions binaires et fonctions logiques, 
fonctions statistiques, logique RPN avec affichage des 4 registres de la pile, 
Lastx, tracé de courbes de fonctions et données, 259 fonctions de programmes + 
69 de je ne sais pas quoi (tout ceci est traduit du hollandais et ce n'est pas 
ma tasse de thé ©!)}, clavier alphanumérique, affichage de 4 lignes de 23 
caractères, FORMULES ALGEBRIQUES (sans doute comme la HP-18), traitement des 
complexes, imprimante infra-rouge en option, mais pas d'autres périphériques, 
rien qui ressemble à la boucle HP-IL, ce qui laisserait la place à une 38 (?) 
qui remplacerait la 41. Ceci dépendra sans doute du succès de cette machine qui 
est annoncée 25% plus cher que la HP-18. Elle contient donc toutes les fonctions 
de laiP-15, HP-16, HP-41+module Stat+tmath. Aspect identique à celui, maintenant 
bien connu, de la HP-18. 
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Cette page sera publiée dans chaque numéro de PPC-T. Seules lon indicatione 
répertoriées dans le dernier numéro du journal font foi. PPC-T étant une annmo 
ciation sans but lucratif, elle ne fait pas de bénéfice. Elle ent adminintiée 
par des bénévoles et ses produits et services sont réservés À non membren 


ASSOCIATION PPC-T 


Association à buts non lucratifs (loi de 1901), PPC-T a suspendu L'inaorip 
tion de nouveaux adhérents du ler Novembre 86 au 31 Aout 87. Si vous voule# nous 
rejoindre après cette date, envoyez-nous une enveloppe timbrée À votre adiennse 


RESPONSABLES DE PPC-T 
Président : Jean-Daniel Dodin (T1) 
Trésorier : Jean-François Sibille (T15) 


Secrétaire : Eric Sergent (T334) 


ADRESSER TOUT LE COURRIER À PPC-T/MICRO-REVUE 77 RUE DU CAGIRE 31104 TOULOUMK 


TEL (A UTILISER AVEC MODERATION) 61 44 93 96 
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